|
100
|
How can I programmatically clear the control's filter
// Occurs when the user presses and then releases the left mouse button over the control.
Procedure OnComClick
Forward Send OnComClick
Send ComClearFilter
End_Procedure
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComFilterBarPromptVisible to OLEexFilterBarPromptVisible
Set ComFilterBarPromptPattern to "USA"
Send ComEndUpdate
End_Procedure
|
|
99
|
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt-combined)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComFilterBarPromptPattern to "USA"
Set ComFilterBarPromptVisible to (OLEexFilterBarVisible + OLEexFilterBarPromptVisible)
Send ComEndUpdate
End_Procedure
|
|
98
|
Is it possible to prevent closing the control's filter bar, so it is always shown (prompt)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComFilterBarPromptVisible to OLEexFilterBarPromptVisible
Set ComFilterBarPromptPattern to "USA"
Send ComEndUpdate
End_Procedure
|
|
97
|
Is it possible to prevent closing the control's filter bar, so it is always shown
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComFilterBarCaption to "len(value) = 0 ? `<fgcolor=808080>no filter` : value"
Set ComFilterBarPromptVisible to OLEexFilterBarVisible
Send ComEndUpdate
End_Procedure
|
|
96
|
How can I find if the control is running in DPI mode
Procedure OnCreate
Forward Send OnCreate
Showln (ComFormatABC(Self,"dpi = 1 ? `normal/stretch mode` : `dpi mode`",Nothing,Nothing,Nothing))
End_Procedure
|
|
95
|
If I connect it to a datasource, all works perfectly but the records that I see in the control is a little number of total of the recordset. I need to show all 60.000 rows of the recordset without click on the [...] button. It s possible to setting up this parameters
Procedure OnCreate
Forward Send OnCreate
Set ComDisplayPivotData to -1
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
End_Procedure
|
|
94
|
How do I change the drop down filter icon/button (white)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 2 "gBFLBCJwBAEHhEJAAEhABX8GACAADACAxSDEMQBQKAAzQFAYbhgHCGAAGQaBUgmFgAQhFcZQSKUOQTDKNYykCIRSDUJYkSZEIyjBI8ExXFqNACkGKwYgmNYiTLAcgANJ0WBaGIZJ4gOT5fDKMoEDRRYADFCscwxJybQAqGQKKb+VgAVY/cTyBIAEQSKA0TDOQ5TSKWB4JPZQRBEbZMNBtBIUJquKaqShdQJCU5FdY3Xblez9P7AMBwLFEC4NQ8YNYuPhjR4dRTIMhvVAsUArFh8Zg9GZZFjmDIDT4ydBLTQwcyVIKnP5qOa6XbmPoCQDYKxZHYxPzVDa3axuL76dqCAT7XrXNy1TbNRrzQKfcJqfCbdw2YaDZLOOT3fjuI4hhKaRzFAHJ+jYQ4xHuY4gHuGIXGeExqC8Tp6C+PoEm+G5ImycRgh0XwvDGa5rgOeoejyXwnFeQp2mkf5ClgBB9gCWIYAwfYAEKV58mkdwOggNArgOXY2EWLoDkKOA0mgbhOGgZApgaSBIHWSYHSmbApgYThmESZYJkIeIkgeCpfliLIHgpMIcmUYYYmODAlg2SI4mWfRfGOEguDcCRjFYAJihCQhJBSDoRmONgKEcI4kFCEJhhOVYTmYnAlEAQhWBMJYJGYWoWmWSR2F6F5lnkWAQhUAgpEieRWEuSYkjWGpmkmNhuhuZwJkYcocmaaYkjyEhngnUA6lEFAlAEgI=" to Nothing
Get ComAdd of hoAppearance 1 "CP:2 -6 -4 2 4" to Nothing
Send Destroy to hoAppearance
Set ComBackground OLEexHeaderFilterBarButton to |CI$1000000
Set ComBackground OLEexCursorHoverColumn to (ComBackColor(Self))
Set ComHeaderVisible to True
Set ComHeaderHeight to 24
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComDisplayFilterList to (OLEexShowCheckBox + OLEexSortItemsAsc)
Set ComPivotBarVisible to OLEexPivotBarVisible
Send ComEndUpdate
End_Procedure
|
|
93
|
How do I change the drop down filter icon/button (black)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "gBFLBCJwBAEHhEJAAEhABXUIQAAYAQGKIcBiAKBQAGYBIJDEMgzDDAUBjKKocQTC4AIQjCK4JDKHYJRpHEZyCA8EhqGASRAFUQBYiWE4oSpLABQaK0ZwIGyRIrkGQgQgmPYDSDNU4zVIEEglBI0TDNczhNDENgtGYaJqHIYpZBcM40TKkEZoSIITZcRrOEBiRL1S0RBhGcRUHZlWzdN64LhuK47UrWdD/XhdVzXRbjfz1Oq+bxve48Br7A5yYThdr4LhOFQ3RjIL4xbIcUwGe6VZhjOLZXjmO49T69HTtOCYBEBA" to Nothing
Send Destroy to hoAppearance
Set ComBackground OLEexHeaderFilterBarButton to |CI$1000000
Set ComBackground OLEexCursorHoverColumn to -1
Set ComBackColorHeader to (RGB(0,0,0))
Set ComForeColorHeader to (RGB(255,255,255))
Set ComHeaderVisible to True
Set ComHeaderHeight to 22
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComDisplayFilterList to (OLEexShowCheckBox + OLEexSortItemsAsc)
Send ComEndUpdate
End_Procedure
|
|
92
|
How do I prevent showing the control's BackColorAlternate property on empty / non-items part of the control
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Set ComBackColorAlternate to |CI$7ff0f0f0
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "12"
Set ComPivotColumns to "sum(5)"
Send ComEndUpdate
End_Procedure
|
|
91
|
How can I find out if the user clicks the grid's header
// Occurs when the user moves the mouse.
Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llX OLE_YPOS_PIXELS llY
Forward Send OnComMouseMove llButton llShift llX llY
Showln "Type of ColumnFromPoint: " (ComColumnFromPoint(Self,-1,-1)) " should not be VT_NULL"
Showln "Type of ValueFromPoint: " (ComValueFromPoint(Self,-1,-1)) " should be VT_NULL"
End_Procedure
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)"
End_Procedure
|
|
90
|
What should I set FormatPivotHeader to, to show it on the columns header only
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)/12"
Set ComFormatPivotHeader to "(iaggregate ? ( caption + ` <off -6><font ;6>(` + lower(caggregate) + ')</off></font>') : caption) + ( ( display=1 ? `<c>Date: <b><upline><dotline>` + date(`now`) : `` ) + `</dotline> </b>` )"
Send ComEndUpdate
End_Procedure
|
|
89
|
What should I set FormatPivotHeader to, to show "Report Generated on 7/9/2016 14:20" etc when the report is executed (ie the date and time will change)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)/12"
Set ComFormatPivotHeader to "(iaggregate ? (`<b>` + caption + `</b> <off -6><font ;6>(` + lower(caggregate) + ')</off></font>') : caption) + `<r>ReportDate: ` + date(`now`)"
Send ComEndUpdate
End_Procedure
|
|
88
|
Is it possible to display aggregate result on parent rows as well
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Set ComHeaderHeight to 22
Set ComDefaultItemHeight to 20
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "12[bold],0"
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "nempty" "not empty" "" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComExpression of hoFormatConditionalAppearance to "len(value) != 0"
Set ComBackColor of hoFormatConditionalAppearance to (RGB(240,240,240))
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Set ComPivotColumns to "sum(5)[nempty]/6"
Set ComIncludeExpandColumn to OLEexIncludeExpandColumn
Set ComDrawGridLines to OLEexNoLines
Set ComShowBranchRows to (OLEexBranchIncludeAggregate + OLEexBranchTree)
Send ComEndUpdate
End_Procedure
|
|
87
|
How do I show expanded/collapsed rows
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Set ComHeaderHeight to 22
Set ComDefaultItemHeight to 20
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "12[bold],0"
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "nempty" "not empty" "" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComExpression of hoFormatConditionalAppearance to "len(value) != 0"
Set ComBackColor of hoFormatConditionalAppearance to (RGB(240,240,240))
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Set ComPivotColumns to "sum(5)[nempty]/6"
Set ComIncludeExpandColumn to OLEexIncludeExpandColumn
Set ComDrawGridLines to OLEexNoLines
Send ComEndUpdate
End_Procedure
|
|
86
|
How do I show expanded/collapsed columns
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Set ComHeaderHeight to 22
Set ComDefaultItemHeight to 20
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "nempty" "not empty" "" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComExpression of hoFormatConditionalAppearance to "len(value) != 0"
Set ComBackColor of hoFormatConditionalAppearance to (RGB(240,240,240))
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Set ComPivotColumns to "sum(5)[nempty]/12"
Set ComFormatPivotHeader to "(iaggregate ? ( caption + ` <r>[` + lower(caggregate) + `]` ) : caption)"
Set ComIncludeExpandColumn to OLEexIncludeExpandColumn
Send ComEndUpdate
End_Procedure
|
|
85
|
Where you have say "Sum of ...." as the first row heading of the pivot are there and options to be able to change this text as a whole
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "nempty" "not empty" "" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComExpression of hoFormatConditionalAppearance to "len(value) != 0"
Set ComBackColor of hoFormatConditionalAppearance to (RGB(240,240,240))
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Set ComPivotColumns to "sum(5)[nempty]/12"
Set ComFormatPivotHeader to "(iaggregate ? (`<b>` + caption + `</b> <off -6><font ;6>(` + lower(caggregate) + ' )') : caption)"
Send ComEndUpdate
End_Procedure
|
|
84
|
How can I get the data column from the cursor
// Occurs when the user moves the mouse.
Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llX OLE_YPOS_PIXELS llY
Forward Send OnComMouseMove llButton llShift llX llY
Showln "DataColumn" (ComDataColumnFromPoint(Self,-1,-1))
End_Procedure
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric]"
Send ComRefresh
End_Procedure
|
|
83
|
Is there any way for the user to change the alignment at runtime (using excontextmenu)
// Occurs once the user right clicks the control.
Procedure OnComRClick
Forward Send OnComRClick
Variant v
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns 5 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Get ComAlignment of hoColumn to v
Send Destroy to hoColumn
Send Destroy to hoColumns
Variant h
Move v to h
Variant c
Get Comcreateobject "Exontrol.ContextMenu" to c
Set ComFlatImageWidth to 0
Set ComToString to "Alignment[align=1][dis],[group=0x71](Left[typ=2][grp=100][close=0][id=0],Center[typ=2][grp=100][close=0][id=1],Right[typ=2][grp=100][close=0][id=2])"
Variant voitem
Get Comitem h to voitem
Handle hoitem
Get Create (RefClass(cComitem)) to hoitem
Set pvComObject of hoitem to voitem
Set ComChecked of hoitem to True
Send Destroy to hoitem
Get ComSelect Nothing Nothing Nothing to h
Variant voColumns1
Get ComDataColumns to voColumns1
Handle hoColumns1
Get Create (RefClass(cComColumns)) to hoColumns1
Set pvComObject of hoColumns1 to voColumns1
Variant voColumn1
Get Comitem of hoColumns1 5 to voColumn1
Handle hoColumn1
Get Create (RefClass(cComColumn)) to hoColumn1
Set pvComObject of hoColumn1 to voColumn1
Set ComAlignment of hoColumn1 to h
Set ComHeaderAlignment of hoColumn1 to h
Send Destroy to hoColumn1
Send Destroy to hoColumns1
Send ComRefresh
End_Procedure
Procedure OnCreate
Forward Send OnCreate
Set ComPivotBarVisible to (OLEexPivotBarAllowResizeColumns + OLEexPivotBarAllowUndoRedo + OLEexPivotBarAutoUpdate + OLEexPivotBarShowTotals + OLEexPivotBarAutoFit + OLEexPivotBarVisible)
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns2
Get ComDataColumns to voColumns2
Handle hoColumns2
Get Create (RefClass(cComColumns)) to hoColumns2
Set pvComObject of hoColumns2 to voColumns2
Variant voColumn2
Get Comitem of hoColumns2 5 to voColumn2
Handle hoColumn2
Get Create (RefClass(cComColumn)) to hoColumn2
Set pvComObject of hoColumn2 to voColumn2
Set ComAlignment of hoColumn2 to OLERightAlignment
Set ComHeaderAlignment of hoColumn2 to OLERightAlignment
Send Destroy to hoColumn2
Send Destroy to hoColumns2
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric]"
Send ComRefresh
End_Procedure
|
|
82
|
Is there any way for the user to change the alignment at runtime
// Occurs once the user right clicks the control.
Procedure OnComRClick
Forward Send OnComRClick
Showln "The column gets aligned to the center"
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns 5 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComAlignment of hoColumn to OLECenterAlignment
Set ComHeaderAlignment of hoColumn to OLECenterAlignment
Send Destroy to hoColumn
Send Destroy to hoColumns
Send ComRefresh
End_Procedure
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns1
Get ComDataColumns to voColumns1
Handle hoColumns1
Get Create (RefClass(cComColumns)) to hoColumns1
Set pvComObject of hoColumns1 to voColumns1
Variant voColumn1
Get Comitem of hoColumns1 5 to voColumn1
Handle hoColumn1
Get Create (RefClass(cComColumn)) to hoColumn1
Set pvComObject of hoColumn1 to voColumn1
Set ComAlignment of hoColumn1 to OLERightAlignment
Set ComHeaderAlignment of hoColumn1 to OLERightAlignment
Send Destroy to hoColumn1
Send Destroy to hoColumns1
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric]"
Send ComRefresh
End_Procedure
|
|
81
|
How can I align a column to the right
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns 5 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComAlignment of hoColumn to OLERightAlignment
Set ComHeaderAlignment of hoColumn to OLERightAlignment
Send Destroy to hoColumn
Send Destroy to hoColumns
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric]"
Send ComRefresh
End_Procedure
|
|
80
|
How can I display the control's content on an single A3 paper size, when using PDF format
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
Send Destroy to hoAppearance
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get Comitem of hoFormatConditionalAppearances "positive" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBackColor of hoFormatConditionalAppearance to |CI$100ff00
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Variant voFormatConditionalAppearances1
Get ComFormatConditionalAppearances to voFormatConditionalAppearances1
Handle hoFormatConditionalAppearances1
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances1
Set pvComObject of hoFormatConditionalAppearances1 to voFormatConditionalAppearances1
Variant voFormatConditionalAppearance1
Get Comitem of hoFormatConditionalAppearances1 "negative" to voFormatConditionalAppearance1
Handle hoFormatConditionalAppearance1
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance1
Set pvComObject of hoFormatConditionalAppearance1 to voFormatConditionalAppearance1
Set ComBackColor of hoFormatConditionalAppearance1 to |CI$10000ff
Send Destroy to hoFormatConditionalAppearance1
Send Destroy to hoFormatConditionalAppearances1
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[positive,negative]/12"
Send ComExpandAll
Variant var_CopyTo
Get ComCopyTo "C:\Temp\Preview.pdf|11.69 in x 16.53 in||single" to var_CopyTo
Showln "Look for C:\Temp\Preview.pd file."
Send ComEndUpdate
End_Procedure
|
|
79
|
How can I display the control's content on an A3 paper size, when using PDF format
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
Send Destroy to hoAppearance
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get Comitem of hoFormatConditionalAppearances "positive" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBackColor of hoFormatConditionalAppearance to |CI$100ff00
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Variant voFormatConditionalAppearances1
Get ComFormatConditionalAppearances to voFormatConditionalAppearances1
Handle hoFormatConditionalAppearances1
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances1
Set pvComObject of hoFormatConditionalAppearances1 to voFormatConditionalAppearances1
Variant voFormatConditionalAppearance1
Get Comitem of hoFormatConditionalAppearances1 "negative" to voFormatConditionalAppearance1
Handle hoFormatConditionalAppearance1
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance1
Set pvComObject of hoFormatConditionalAppearance1 to voFormatConditionalAppearance1
Set ComBackColor of hoFormatConditionalAppearance1 to |CI$10000ff
Send Destroy to hoFormatConditionalAppearance1
Send Destroy to hoFormatConditionalAppearances1
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[positive,negative]/12"
Send ComExpandAll
Variant var_CopyTo
Get ComCopyTo "C:\Temp\Preview.pdf|11.69 in x 16.53 in" to var_CopyTo
Showln "Look for C:\Temp\Preview.pd file."
Send ComEndUpdate
End_Procedure
|
|
78
|
How can I export the control's content to a PDF document (method 1)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
Send Destroy to hoAppearance
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get Comitem of hoFormatConditionalAppearances "positive" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBackColor of hoFormatConditionalAppearance to |CI$100ff00
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Variant voFormatConditionalAppearances1
Get ComFormatConditionalAppearances to voFormatConditionalAppearances1
Handle hoFormatConditionalAppearances1
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances1
Set pvComObject of hoFormatConditionalAppearances1 to voFormatConditionalAppearances1
Variant voFormatConditionalAppearance1
Get Comitem of hoFormatConditionalAppearances1 "negative" to voFormatConditionalAppearance1
Handle hoFormatConditionalAppearance1
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance1
Set pvComObject of hoFormatConditionalAppearance1 to voFormatConditionalAppearance1
Set ComBackColor of hoFormatConditionalAppearance1 to |CI$10000ff
Send Destroy to hoFormatConditionalAppearance1
Send Destroy to hoFormatConditionalAppearances1
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[positive,negative]/12"
Send ComExpandAll
Send ComEndUpdate
Handle hoPrint
Get Create (RefClass(cComPrint)) to hoPrint // Import the 'ExPrint 1.0 Control Library' library
Set ComPrintExt of hoPrint to (pvComObject(Self))
Get ComCopyTo of hoPrint "c:/temp/xtest.pdf" to Nothing
Send Destroy to hoPrint
Showln "Look for C:\Temp\xtest.pdf file."
Send ComEndUpdate
End_Procedure
|
|
77
|
How can I export the control's content to a PDF document (method 2)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
Send Destroy to hoAppearance
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get Comitem of hoFormatConditionalAppearances "positive" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBackColor of hoFormatConditionalAppearance to |CI$100ff00
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Variant voFormatConditionalAppearances1
Get ComFormatConditionalAppearances to voFormatConditionalAppearances1
Handle hoFormatConditionalAppearances1
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances1
Set pvComObject of hoFormatConditionalAppearances1 to voFormatConditionalAppearances1
Variant voFormatConditionalAppearance1
Get Comitem of hoFormatConditionalAppearances1 "negative" to voFormatConditionalAppearance1
Handle hoFormatConditionalAppearance1
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance1
Set pvComObject of hoFormatConditionalAppearance1 to voFormatConditionalAppearance1
Set ComBackColor of hoFormatConditionalAppearance1 to |CI$10000ff
Send Destroy to hoFormatConditionalAppearance1
Send Destroy to hoFormatConditionalAppearances1
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[positive,negative]/12"
Send ComExpandAll
Variant var_CopyTo
Get ComCopyTo "c:/temp/xtest.pdf" to var_CopyTo
Showln "Look for C:\Temp\xtest.pdf file."
Send ComEndUpdate
End_Procedure
|
|
76
|
Does / could the control have a read-only mode by where I could load the data and layout and just use the control to display it and allow the user to scroll around it / print it but not change it
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric]"
Set ComDisplayFilterList to OLEexNoItems
Set ComPivotBarVisible to (OLEexPivotBarReadOnly + OLEexPivotBarAutoUpdate + OLEexPivotBarAutoFit + OLEexPivotBarVisible)
Send ComRefresh
End_Procedure
|
|
75
|
Is it possible to edit the conditional-expression at runtime
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "custom" "custom" "" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBold of hoFormatConditionalAppearance to True
Set ComFontSize of hoFormatConditionalAppearance to 12
Set ComExpression of hoFormatConditionalAppearance to "value > 2000"
Set ComContextEditExpression of hoFormatConditionalAppearance to True
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[custom]/12"
Send ComEndUpdate
End_Procedure
|
|
74
|
How can I highlight values using EBN colors
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
Send Destroy to hoAppearance
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get Comitem of hoFormatConditionalAppearances "positive" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBackColor of hoFormatConditionalAppearance to |CI$100ff00
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Variant voFormatConditionalAppearances1
Get ComFormatConditionalAppearances to voFormatConditionalAppearances1
Handle hoFormatConditionalAppearances1
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances1
Set pvComObject of hoFormatConditionalAppearances1 to voFormatConditionalAppearances1
Variant voFormatConditionalAppearance1
Get Comitem of hoFormatConditionalAppearances1 "negative" to voFormatConditionalAppearance1
Handle hoFormatConditionalAppearance1
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance1
Set pvComObject of hoFormatConditionalAppearance1 to voFormatConditionalAppearance1
Set ComBackColor of hoFormatConditionalAppearance1 to |CI$10000ff
Send Destroy to hoFormatConditionalAppearance1
Send Destroy to hoFormatConditionalAppearances1
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[positive,negative]/12"
Send ComEndUpdate
End_Procedure
|
|
73
|
How do I mark not-empty values in the chart
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "nempty" "not empty" "" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComExpression of hoFormatConditionalAppearance to "len(value) != 0"
Set ComBackColor of hoFormatConditionalAppearance to (RGB(240,240,240))
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Set ComPivotColumns to "sum(5)[nempty]/12"
Send ComEndUpdate
End_Procedure
|
|
72
|
How can I highlight negative and positive values in the same chart
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[negative,positive]/12"
Send ComEndUpdate
End_Procedure
|
|
71
|
How can I highlight values that starts with a letter
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "f" "starts with f" "lower(value) startwith `f`" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComExpression of hoFormatConditionalAppearance to "lower(value) startwith `f`"
Set ComShadow of hoFormatConditionalAppearance to (RGB(1,0,0))
Set ComShadowOffset of hoFormatConditionalAppearance to 0
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0[f]"
Send ComEndUpdate
End_Procedure
|
|
70
|
How can I mark values greater than a value, 100 for instance
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get ComAdd of hoFormatConditionalAppearances "greater100" ">100" "value > 100" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComExpression of hoFormatConditionalAppearance to "( dbl(value) != 0 ) ? (value > 100) : 0"
Set ComForeColor of hoFormatConditionalAppearance to (RGB(255,0,0))
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[greater100,content=numeric]"
Send ComEndUpdate
End_Procedure
|
|
69
|
How can I remove the Conditional context-menu
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Set ComPivotBarVisible to (OLEexPivotBarAllowResizeColumns + OLEexPivotBarAllowUndoRedo + OLEexPivotBarAutoUpdate + OLEexPivotBarAllowFormatContent + OLEexPivotBarAllowFormatAppearance + OLEexPivotBarAllowValues + OLEexPivotBarShowTotals + OLEexPivotBarAutoFit + OLEexPivotBarSizable + OLEexPivotBarVisible)
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric]"
Send ComEndUpdate
End_Procedure
|
|
68
|
How do change the way the negative/positive numbers show when using conditional-format
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get Comitem of hoFormatConditionalAppearances "negative" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBackColor of hoFormatConditionalAppearance to (RGB(0,0,0))
Set ComForeColor of hoFormatConditionalAppearance to (RGB(128,128,128))
Set ComFontSize of hoFormatConditionalAppearance to 8
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Variant voFormatConditionalAppearances1
Get ComFormatConditionalAppearances to voFormatConditionalAppearances1
Handle hoFormatConditionalAppearances1
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances1
Set pvComObject of hoFormatConditionalAppearances1 to voFormatConditionalAppearances1
Variant voFormatConditionalAppearance1
Get Comitem of hoFormatConditionalAppearances1 "positive" to voFormatConditionalAppearance1
Handle hoFormatConditionalAppearance1
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance1
Set pvComObject of hoFormatConditionalAppearance1 to voFormatConditionalAppearance1
Set ComBackColor of hoFormatConditionalAppearance1 to (RGB(0,0,0))
Set ComForeColor of hoFormatConditionalAppearance1 to (RGB(1,0,0))
Set ComFontSize of hoFormatConditionalAppearance1 to 11
Send Destroy to hoFormatConditionalAppearance1
Send Destroy to hoFormatConditionalAppearances1
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[negative,positive,content=numeric]"
Send ComEndUpdate
End_Procedure
|
|
67
|
How do I highlight the negative values with white color or black
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatConditionalAppearances
Get ComFormatConditionalAppearances to voFormatConditionalAppearances
Handle hoFormatConditionalAppearances
Get Create (RefClass(cComFormatConditionalAppearances)) to hoFormatConditionalAppearances
Set pvComObject of hoFormatConditionalAppearances to voFormatConditionalAppearances
Variant voFormatConditionalAppearance
Get Comitem of hoFormatConditionalAppearances "negative" to voFormatConditionalAppearance
Handle hoFormatConditionalAppearance
Get Create (RefClass(cComFormatConditionalAppearance)) to hoFormatConditionalAppearance
Set pvComObject of hoFormatConditionalAppearance to voFormatConditionalAppearance
Set ComBackColor of hoFormatConditionalAppearance to (RGB(1,0,0))
Set ComForeColor of hoFormatConditionalAppearance to (RGB(255,255,255))
Send Destroy to hoFormatConditionalAppearance
Send Destroy to hoFormatConditionalAppearances
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[negative,content=numeric]"
Send ComEndUpdate
End_Procedure
|
|
66
|
Does your control support conditional-format, so I can highlight certain values
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[negative,content=numeric]"
Send ComEndUpdate
End_Procedure
|
|
65
|
How do I add a computed column/field, like VAT for instance (method 2)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAggregates
Get ComAggregates to voAggregates
Handle hoAggregates
Get Create (RefClass(cComAggregates)) to hoAggregates
Set pvComObject of hoAggregates to voAggregates
Variant voAggregate
Get ComAdd of hoAggregates "vat19" "sum" "VAT 19%" "VAT 19%" to voAggregate
Handle hoAggregate
Get Create (RefClass(cComAggregate)) to hoAggregate
Set pvComObject of hoAggregate to voAggregate
Set ComFormatValue of hoAggregate to "value * 0.19"
Send Destroy to hoAggregate
Variant voAggregate1
Get ComAdd of hoAggregates "vat24" "sum" "VAT 24%" "VAT 24%" to voAggregate1
Handle hoAggregate1
Get Create (RefClass(cComAggregate)) to hoAggregate1
Set pvComObject of hoAggregate1 to voAggregate1
Set ComFormatValue of hoAggregate1 to "value * 0.24"
Send Destroy to hoAggregate1
Send Destroy to hoAggregates
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric],vat19(5)[bold,content=numeric],vat24(5)[bold,content=numeric]"
Send ComEndUpdate
End_Procedure
|
|
64
|
How do I add a computed column/field, like VAT for instance (method 1)
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voFormatContents
Get ComFormatContents to voFormatContents
Handle hoFormatContents
Get Create (RefClass(cComFormatContents)) to hoFormatContents
Set pvComObject of hoFormatContents to voFormatContents
Variant voFormatContent
Get ComAdd of hoFormatContents "vat19" "VAT 19%" Nothing to voFormatContent
Handle hoFormatContent
Get Create (RefClass(cComFormatContent)) to hoFormatContent
Set pvComObject of hoFormatContent to voFormatContent
Set ComExpression of hoFormatContent to "len(value) ? ((value * 1.19) format '') : ''"
Send Destroy to hoFormatContent
Send Destroy to hoFormatContents
Variant voFormatContents1
Get ComFormatContents to voFormatContents1
Handle hoFormatContents1
Get Create (RefClass(cComFormatContents)) to hoFormatContents1
Set pvComObject of hoFormatContents1 to voFormatContents1
Variant voFormatContent1
Get ComAdd of hoFormatContents1 "vat24" "VAT 24%" Nothing to voFormatContent1
Handle hoFormatContent1
Get Create (RefClass(cComFormatContent)) to hoFormatContent1
Set pvComObject of hoFormatContent1 to voFormatContent1
Set ComExpression of hoFormatContent1 to "len(value) ? ((value * 1.24) format '') : ''"
Send Destroy to hoFormatContent1
Send Destroy to hoFormatContents1
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[content=numeric],sum(5)[bold,content=vat19],sum(5)[bold,content=vat24]"
Send ComEndUpdate
End_Procedure
|
|
63
|
How can I hide some values for instance negative values
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voFormatContents
Get ComFormatContents to voFormatContents
Handle hoFormatContents
Get Create (RefClass(cComFormatContents)) to hoFormatContents
Set pvComObject of hoFormatContents to voFormatContents
Variant voFormatContent
Get ComAdd of hoFormatContents "hiden" "hide negative" Nothing to voFormatContent
Handle hoFormatContent
Get Create (RefClass(cComFormatContent)) to hoFormatContent
Set pvComObject of hoFormatContent to voFormatContent
Set ComExpression of hoFormatContent to "value < 0 ? `` : value"
Send Destroy to hoFormatContent
Send Destroy to hoFormatContents
Variant voFormatContents1
Get ComFormatContents to voFormatContents1
Handle hoFormatContents1
Get Create (RefClass(cComFormatContents)) to hoFormatContents1
Set pvComObject of hoFormatContents1 to voFormatContents1
Variant voFormatContent1
Get ComAdd of hoFormatContents1 "hidep" "hide positive" Nothing to voFormatContent1
Handle hoFormatContent1
Get Create (RefClass(cComFormatContent)) to hoFormatContent1
Set pvComObject of hoFormatContent1 to voFormatContent1
Set ComExpression of hoFormatContent1 to "value > 0 ? `` : value"
Send Destroy to hoFormatContent1
Send Destroy to hoFormatContents1
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[bold],sum(5)[content=hiden],sum(5)[content=hidep]"
Send ComEndUpdate
End_Procedure
|
|
62
|
How can I decode the Layout property
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)/12"
Set ComLayout to "Columns =1;C0.Width = 64"
Handle hoPrint
Get Create (RefClass(cComPrint)) to hoPrint // Import the 'ExPrint 1.0 Control Library' library
Variant vText64
Get ComLayout to vText64
Showln (ComDecode64TextW(hoPrint,vText64))
Send Destroy to hoPrint
Send ComEndUpdate
End_Procedure
|
|
61
|
How can I specify the sorting type, so the column gets sorted as numeric for instance
Procedure OnCreate
Forward Send OnCreate
Get ComImport "1,1#11,11#101,101" "eor='#' eof=',' hdr=0" to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns 0 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComCaption of hoColumn to "Numeric"
Set ComSortType of hoColumn to OLESortNumeric
Send Destroy to hoColumn
Send Destroy to hoColumns
Variant voColumns1
Get ComDataColumns to voColumns1
Handle hoColumns1
Get Create (RefClass(cComColumns)) to hoColumns1
Set pvComObject of hoColumns1 to voColumns1
Variant voColumn1
Get Comitem of hoColumns1 1 to voColumn1
Handle hoColumn1
Get Create (RefClass(cComColumn)) to hoColumn1
Set pvComObject of hoColumn1 to voColumn1
Set ComCaption of hoColumn1 to "String (default)"
Send Destroy to hoColumn1
Send Destroy to hoColumns1
Set ComPivotRows to "0"
Send ComRefresh
End_Procedure
|
|
60
|
How can I disable the control's context menu
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotBarVisible to (OLEexPivotBarAllowResizeColumns + OLEexPivotBarAllowUndoRedo + OLEexPivotBarAutoUpdate + OLEexPivotBarAllowValues + OLEexPivotBarShowTotals + OLEexPivotBarAutoFit + OLEexPivotBarSizable + OLEexPivotBarVisible)
End_Procedure
|
|
59
|
How do I get the captions of the columns
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant v
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Get ComCount of hoColumns to v
Send Destroy to hoColumns
Showln v
Variant v1
Variant voColumns1
Get ComDataColumns to voColumns1
Handle hoColumns1
Get Create (RefClass(cComColumns)) to hoColumns1
Set pvComObject of hoColumns1 to voColumns1
Variant voColumn
Get Comitem of hoColumns1 0 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Get ComPivotCaption of hoColumn to v1
Send Destroy to hoColumn
Send Destroy to hoColumns1
Showln v1
Variant v2
Variant voColumns2
Get ComDataColumns to voColumns2
Handle hoColumns2
Get Create (RefClass(cComColumns)) to hoColumns2
Set pvComObject of hoColumns2 to voColumns2
Variant voColumn1
Get Comitem of hoColumns2 0 to voColumn1
Handle hoColumn1
Get Create (RefClass(cComColumn)) to hoColumn1
Set pvComObject of hoColumn1 to voColumn1
Get ComCaption of hoColumn1 to v2
Send Destroy to hoColumn1
Send Destroy to hoColumns2
Showln v2
Variant v3
Variant voColumns3
Get ComDataColumns to voColumns3
Handle hoColumns3
Get Create (RefClass(cComColumns)) to hoColumns3
Set pvComObject of hoColumns3 to voColumns3
Variant voColumn2
Get Comitem of hoColumns3 1 to voColumn2
Handle hoColumn2
Get Create (RefClass(cComColumn)) to hoColumn2
Set pvComObject of hoColumn2 to voColumn2
Get ComPivotCaption of hoColumn2 to v3
Send Destroy to hoColumn2
Send Destroy to hoColumns3
Showln v3
Variant v4
Variant voColumns4
Get ComDataColumns to voColumns4
Handle hoColumns4
Get Create (RefClass(cComColumns)) to hoColumns4
Set pvComObject of hoColumns4 to voColumns4
Variant voColumn3
Get Comitem of hoColumns4 1 to voColumn3
Handle hoColumn3
Get Create (RefClass(cComColumn)) to hoColumn3
Set pvComObject of hoColumn3 to voColumn3
Get ComCaption of hoColumn3 to v4
Send Destroy to hoColumn3
Send Destroy to hoColumns4
Showln v4
End_Procedure
|
|
58
|
How can I specify the default-format for a specified column, so it always shows as numeric for instance
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns "Freight" to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComDefaultFormatContent of hoColumn to "numeric"
Set ComDefaultFormatAppearances of hoColumn to "bold"
Set ComSortOrder of hoColumn to OLESortAscending
Set ComSortType of hoColumn to OLESortNumeric
Send Destroy to hoColumn
Send Destroy to hoColumns
Set ComPivotTotalDefaultFormatContent to "currency"
Set ComPivotTotalDefaultFormatAppearances to "strikeout,bold"
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)[bold,content=numeric]"
Set ComPivotTotals to "sum[strikeout,bold,content=currency]"
Set ComPivotColumnsFloatBarVisible to True
Send ComRefresh
End_Procedure
|
|
57
|
How can I display the percentage column
Procedure OnCreate
Forward Send OnCreate
Variant voFormatContents
Get ComFormatContents to voFormatContents
Handle hoFormatContents
Get Create (RefClass(cComFormatContents)) to hoFormatContents
Set pvComObject of hoFormatContents to voFormatContents
Get ComAdd of hoFormatContents "percent" "value + `%`" Nothing to Nothing
Send Destroy to hoFormatContents
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "5[content=percent]"
Send ComRefresh
End_Procedure
|
|
56
|
How do I change the name for months in the drop-down filter window (localization)
Procedure OnCreate
Forward Send OnCreate
Showln (ComDescription(Self,OLEexFilterBarDateMonths))
Set ComDescription OLEexFilterBarDateMonths to "Ianuarie Februarie Martie Aprilie Mai Iunie Iulie August Septembrie Octombrie Noiembrie Decembrie"
Set ComDescription OLEexFilterBarAll to "(Toate)"
Set ComDescription OLEexFilterBarBlanks to "(Gol)"
Set ComDescription OLEexFilterBarNonBlanks to "(Plin)"
Set ComDescription OLEexFilterBarFilterForCaption to "Filtreaza:"
Set ComDescription OLEexFilterBarDateTodayCaption to "Azi"
Set ComDescription OLEexFilterBarDateWeekDays to "D L Ma Mi J V S"
Set ComDescription OLEexFilterBarExclude to "Exclud"
Set ComDescription OLEexColumnsFloatBar to "Coloane"
Set ComDescription OLEexFilterBarAnd to "si"
Set ComDescription OLEexFilterBarDate to "Data:"
Set ComDescription OLEexFilterBarDateTitle to "Data"
Set ComDescription OLEexFilterBarDateTo to "la"
Set ComDescription OLEexFilterBarNot to "nu"
Set ComDescription OLEexFilterBarOr to "sau"
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns "OrderDate" to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComSortType of hoColumn to OLESortDate
Send Destroy to hoColumn
Send Destroy to hoColumns
Set ComPivotRows to "9"
Send ComRefresh
End_Procedure
|
|
55
|
How can I scale and print programmatically the pivot table, to fit on one axis eg FitPageHeight but infinite width etc
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "6"
Set ComPivotColumns to "sum(5)/3"
Send ComRefresh
Handle hoPrint
Get Create (RefClass(cComPrint)) to hoPrint // Import the 'ExPrint 1.0 Control Library' library
Set ComOptions of hoPrint to "FitToPage = x 5"
Set ComPrintExts of hoPrint to (pvComObject(Self))
Send ComPreview of hoPrint
Send Destroy to hoPrint
End_Procedure
|
|
54
|
How can I scale and print programmatically the pivot table, to fit on one axis eg FitPageWidth but infinite height etc
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "6"
Set ComPivotColumns to "sum(5)/3"
Send ComRefresh
Handle hoPrint
Get Create (RefClass(cComPrint)) to hoPrint // Import the 'ExPrint 1.0 Control Library' library
Set ComOptions of hoPrint to "FitToPage = 5 x"
Set ComPrintExts of hoPrint to (pvComObject(Self))
Send ComPreview of hoPrint
Send Destroy to hoPrint
End_Procedure
|
|
53
|
How can I get the column from the cursor
// Occurs when the user moves the mouse.
Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llX OLE_YPOS_PIXELS llY
Forward Send OnComMouseMove llButton llShift llX llY
Showln (ComColumnFromPoint(Self,-1,-1))
End_Procedure
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Send ComRefresh
End_Procedure
|
|
52
|
How can I get the value from the cursor
// Occurs when the user moves the mouse.
Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llX OLE_YPOS_PIXELS llY
Forward Send OnComMouseMove llButton llShift llX llY
Showln (ComValueFromPoint(Self,-1,-1))
End_Procedure
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Send ComRefresh
End_Procedure
|
|
51
|
How can I specify a column to display HTML format
Procedure OnCreate
Forward Send OnCreate
Get ComImport "Bold <b>1,Bold <b>2#Bold <b>3,Bold <b>4#Bold <b>5,Bold <b>6" "eor='#' eof=',' hdr=0" to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns 0 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComHTML of hoColumn to True
Send Destroy to hoColumn
Send Destroy to hoColumns
Variant voColumns1
Get ComDataColumns to voColumns1
Handle hoColumns1
Get Create (RefClass(cComColumns)) to hoColumns1
Set pvComObject of hoColumns1 to voColumns1
Variant voColumn1
Get Comitem of hoColumns1 1 to voColumn1
Handle hoColumn1
Get Create (RefClass(cComColumn)) to hoColumn1
Set pvComObject of hoColumn1 to voColumn1
Set ComHTML of hoColumn1 to True
Send Destroy to hoColumn1
Send Destroy to hoColumns1
Set ComPivotRows to "0"
Send ComRefresh
End_Procedure
|
|
50
|
Does your control supports scrolling by touching the screen
Procedure OnCreate
Forward Send OnCreate
Variant rs
Get Comcreateobject "ADOR.Recordset" to rs
Send ComOpen "Data" "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Program Files\Exontrol\ExPivot\Sample\Access\sample.accdb" OLEadOpenStatic OLEadLockOptimistic Nothing
Set ComDataSource to rs
Set ComAutoDrag to (OLEexAutoDragScrollOnShortTouch + OLEexAutoDragScroll)
End_Procedure
|
|
49
|
How can I specify programatically the width of the pivot column ( first column )
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)/12"
Set ComLayout to "Columns =1;C0.Width = 64"
Send ComEndUpdate
End_Procedure
|
|
48
|
How can I show the total of each row, when columns are shown as expanded
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Set ComIncludeExpandColumn to OLEexIncludeExpandColumn
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)/12"
Send ComEndUpdate
End_Procedure
|
|
47
|
How can I prevent grouping by a specified column
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns "Freight" to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComAllowGroupBy of hoColumn to OLEexGroupByNone
Send Destroy to hoColumn
Send Destroy to hoColumns
End_Procedure
|
|
46
|
How can I sort alphabetically the columns to be displayed in the context menu/floating panel
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotBarVisible to (OLEexPivotBarContextSortAscending + OLEexPivotBarAllowResizeColumns + OLEexPivotBarAllowUndoRedo + OLEexPivotBarAutoUpdate + OLEexPivotBarAllowFormatContent + OLEexPivotBarAllowFormatAppearance + OLEexPivotBarAllowValues + OLEexPivotBarShowTotals + OLEexPivotBarAutoFit + OLEexPivotBarSizable + OLEexPivotBarVisible)
Set ComPivotColumnsSortOrder to OLEexPivotColumnsAscending
Set ComPivotColumnsFloatBarVisible to True
End_Procedure
|
|
45
|
How can I prevent dropping data to the control
Procedure OnCreate
Forward Send OnCreate
Set ComAllowDrop to False
End_Procedure
|
|
44
|
Is it possible to allow incremental filtering on drop down filter window too, as I can on the control menus
Procedure OnCreate
Forward Send OnCreate
Variant var_DisplayFilterList
Get ComDisplayFilterList to var_DisplayFilterList
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComDisplayFilterList to (OLEexHideFilterPattern + OLEexFilterListDefault)
End_Procedure
|
|
43
|
How can I prevent showing the Filter For field in the drop down filter window
Procedure OnCreate
Forward Send OnCreate
Variant var_DisplayFilterList
Get ComDisplayFilterList to var_DisplayFilterList
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComDisplayFilterList to (OLEexHideFilterPattern + OLEexFilterListDefault)
End_Procedure
|
|
42
|
How can I display the numeric columns only when selecting a new aggregate, like SUM
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0[bold]"
Set ComPivotColumns to "sum(5)/12,count(5)/12"
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns "Freight" to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComSortType of hoColumn to OLESortNumeric
Send Destroy to hoColumn
Send Destroy to hoColumns
End_Procedure
|
|
41
|
How can I add a value column
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)/12"
End_Procedure
|
|
40
|
I would like to always have the subtotals in the same row of the "father row". Could that be done
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0[bold],2"
Set ComPivotColumns to "sum(5)/12,count(5)/12"
Set ComShowViewCompact to (OLEexViewCompactAggregates + OLEexViewCompact)
Set ComPivotTotals to "/sum,sum(0)"
End_Procedure
|
|
39
|
Is there any way, when I change the filter of the column, it broadcast the filter to the other pivot columns that were duplicated
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0,2"
Set ComShowBranchRows to OLEexBranchCompact
Set ComPivotColumns to "sum(5)/12[filter='gBpNxjNh1MhlBoKNhpOZ0hJVNxpOhlMggKBhMZrMJnMoAgI='],count(5)/12[filter='gBpNxjNh1MhlBoKNhpOZ0hJVNxpOhlMggKBhMZrMJnMoAgI=']"
Set ComShowViewCompact to (OLEexViewCompactKeepSettings + OLEexViewCompact)
End_Procedure
|
|
38
|
How can I summarize more fields in the same cell
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0,2"
Set ComShowBranchRows to OLEexBranchCompact
Set ComPivotColumns to "sum(5)/12,count(5)/12"
Set ComShowViewCompact to OLEexViewCompact
End_Procedure
|
|
37
|
How do I programmatically group by rows, in a compact way, no hierarchy lines
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0,2"
Set ComShowBranchRows to OLEexBranchCompact
End_Procedure
|
|
36
|
How do I programmatically group by rows
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0,1,2"
Set ComLinesAtRoot to OLEexLinesAtRoot
Set ComHasLines to OLEexSolidLine
End_Procedure
|
|
35
|
How do I programmatically group by columns
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)/12;6"
End_Procedure
|
|
34
|
How can I hide the add new button on the pivot bar
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotBarVisible to (OLEexPivotBarHideAddNew + OLEexPivotBarAllowResizeColumns + OLEexPivotBarAllowUndoRedo + OLEexPivotBarAutoUpdate + OLEexPivotBarAllowFormatContent + OLEexPivotBarAllowFormatAppearance + OLEexPivotBarAllowValues + OLEexPivotBarShowTotals + OLEexPivotBarAutoFit + OLEexPivotBarSizable + OLEexPivotBarVisible)
End_Procedure
|
|
33
|
Is it possible to show the data that generated the result, when double clicking the row
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0[italic]"
Set ComPivotColumns to "count(0)[underline]"
Set ComPivotTotals to "count[bold,strikeout]"
Set ComShowDataOnDblClick to True
Send ComEndUpdate
End_Procedure
|
|
32
|
Does your control support subscript or superscript, in HTML captions
Procedure OnCreate
Forward Send OnCreate
Set ComHeaderHeight to 22
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns "ShipCountry" to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComCaption of hoColumn to "ShipCountry<font ;7><off 6><sha ;;0>subscript"
Send Destroy to hoColumn
Send Destroy to hoColumns
Variant voColumns1
Get ComDataColumns to voColumns1
Handle hoColumns1
Get Create (RefClass(cComColumns)) to hoColumns1
Set pvComObject of hoColumns1 to voColumns1
Variant voColumn1
Get Comitem of hoColumns1 "ShipRegion" to voColumn1
Handle hoColumn1
Get Create (RefClass(cComColumn)) to hoColumn1
Set pvComObject of hoColumn1 to voColumn1
Set ComCaption of hoColumn1 to "ShipRegion<font ;7><off -6><sha ;;0>superscript"
Send Destroy to hoColumn1
Send Destroy to hoColumns1
Send ComRefresh
End_Procedure
|
|
31
|
Is it possible to define a different background color for the pivot bar
Procedure OnCreate
Forward Send OnCreate
Set ComBackground OLEexPivotBarBackColor to (RGB(240,240,240))
End_Procedure
|
|
30
|
How can I display an icon/image to Content sub-menu
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
Variant voFormatContents
Get ComFormatContents to voFormatContents
Handle hoFormatContents
Get Create (RefClass(cComFormatContents)) to hoFormatContents
Set pvComObject of hoFormatContents to voFormatContents
Variant voFormatContent
Get Comitem of hoFormatContents "numeric" to voFormatContent
Handle hoFormatContent
Get Create (RefClass(cComFormatContent)) to hoFormatContent
Set pvComObject of hoFormatContent to voFormatContent
Set ComName of hoFormatContent to "<img>1</img> Numeric"
Send Destroy to hoFormatContent
Send Destroy to hoFormatContents
Set ComPivotRows to "5[content=numeric]"
End_Procedure
|
|
29
|
How can I change the selection background in the control's context menu
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComBackground OLEexSelBackColorFilter to (RGB(255,0,0))
End_Procedure
|
|
28
|
How can I display the column as date in a long format
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatContents
Get ComFormatContents to voFormatContents
Handle hoFormatContents
Get Create (RefClass(cComFormatContents)) to hoFormatContents
Set pvComObject of hoFormatContents to voFormatContents
Get ComAdd of hoFormatContents "longdate" "longdate(date(value))" Nothing to Nothing
Send Destroy to hoFormatContents
Set ComPivotRows to "9[content=longdate]"
End_Procedure
|
|
27
|
Is it possible to display the column in upper-case
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatContents
Get ComFormatContents to voFormatContents
Handle hoFormatContents
Get Create (RefClass(cComFormatContents)) to hoFormatContents
Set pvComObject of hoFormatContents to voFormatContents
Get ComAdd of hoFormatContents "upper" "upper(value)" Nothing to Nothing
Send Destroy to hoFormatContents
Set ComPivotRows to "0[content=upper]"
End_Procedure
|
|
26
|
How can I programatically bold a column
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0[bold]"
End_Procedure
|
|
25
|
How can I display the total with a different foreground color
Procedure OnCreate
Forward Send OnCreate
Variant voFormatAppearances
Get ComFormatAppearances to voFormatAppearances
Handle hoFormatAppearances
Get Create (RefClass(cComFormatAppearances)) to hoFormatAppearances
Set pvComObject of hoFormatAppearances to voFormatAppearances
Variant voFormatAppearance
Get ComAdd of hoFormatAppearances "fore" Nothing to voFormatAppearance
Handle hoFormatAppearance
Get Create (RefClass(cComFormatAppearance)) to hoFormatAppearance
Set pvComObject of hoFormatAppearance to voFormatAppearance
Set ComForeColor of hoFormatAppearance to (RGB(255,0,0))
Send Destroy to hoFormatAppearance
Send Destroy to hoFormatAppearances
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)"
Set ComPivotTotals to "sum[fore,bold]"
End_Procedure
|
|
24
|
How can I display the total with a different background color/ebn
Procedure OnCreate
Forward Send OnCreate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
Send Destroy to hoAppearance
Variant voFormatAppearances
Get ComFormatAppearances to voFormatAppearances
Handle hoFormatAppearances
Get Create (RefClass(cComFormatAppearances)) to hoFormatAppearances
Set pvComObject of hoFormatAppearances to voFormatAppearances
Variant voFormatAppearance
Get ComAdd of hoFormatAppearances "back" Nothing to voFormatAppearance
Handle hoFormatAppearance
Get Create (RefClass(cComFormatAppearance)) to hoFormatAppearance
Set pvComObject of hoFormatAppearance to voFormatAppearance
Set ComBackColor of hoFormatAppearance to |CI$1000000
Send Destroy to hoFormatAppearance
Send Destroy to hoFormatAppearances
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)"
Set ComPivotTotals to "sum[back]"
End_Procedure
|
|
23
|
How can I display the total with a solid background color
Procedure OnCreate
Forward Send OnCreate
Variant voFormatAppearances
Get ComFormatAppearances to voFormatAppearances
Handle hoFormatAppearances
Get Create (RefClass(cComFormatAppearances)) to hoFormatAppearances
Set pvComObject of hoFormatAppearances to voFormatAppearances
Variant voFormatAppearance
Get ComAdd of hoFormatAppearances "back" Nothing to voFormatAppearance
Handle hoFormatAppearance
Get Create (RefClass(cComFormatAppearance)) to hoFormatAppearance
Set pvComObject of hoFormatAppearance to voFormatAppearance
Set ComBackColor of hoFormatAppearance to (RGB(240,240,240))
Send Destroy to hoFormatAppearance
Send Destroy to hoFormatAppearances
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)"
Set ComPivotTotals to "sum[back]"
End_Procedure
|
|
22
|
Is it possible to change the "bold" caption in the control's context menu
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatAppearances
Get ComFormatAppearances to voFormatAppearances
Handle hoFormatAppearances
Get Create (RefClass(cComFormatAppearances)) to hoFormatAppearances
Set pvComObject of hoFormatAppearances to voFormatAppearances
Variant voFormatAppearance
Get Comitem of hoFormatAppearances "bold" to voFormatAppearance
Handle hoFormatAppearance
Get Create (RefClass(cComFormatAppearance)) to hoFormatAppearance
Set pvComObject of hoFormatAppearance to voFormatAppearance
Set ComName of hoFormatAppearance to "Ingrosat"
Send Destroy to hoFormatAppearance
Send Destroy to hoFormatAppearances
End_Procedure
|
|
21
|
Is it possible to show no Exclude field in the filter window
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComDisplayFilterList to (OLEexShowCheckBox + OLEexSortItemsAsc)
End_Procedure
|
|
20
|
How can I prevent showing the drop down filter button
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComDisplayFilterList to OLEexNoItems
End_Procedure
|
|
19
|
How do I get the count of positive values only
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voAggregates
Get ComAggregates to voAggregates
Handle hoAggregates
Get Create (RefClass(cComAggregates)) to hoAggregates
Set pvComObject of hoAggregates to voAggregates
Variant voAggregate
Get ComAdd of hoAggregates "positive" "sum" Nothing Nothing to voAggregate
Handle hoAggregate
Get Create (RefClass(cComAggregate)) to hoAggregate
Set pvComObject of hoAggregate to voAggregate
Set ComFormatValue of hoAggregate to "value < 0 ? 0 : 1"
Send Destroy to hoAggregate
Send Destroy to hoAggregates
Set ComPivotRows to "0"
Set ComPivotColumns to "positive(5)"
End_Procedure
|
|
18
|
How do I get the sum for negative values only
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voAggregates
Get ComAggregates to voAggregates
Handle hoAggregates
Get Create (RefClass(cComAggregates)) to hoAggregates
Set pvComObject of hoAggregates to voAggregates
Variant voAggregate
Get ComAdd of hoAggregates "negative" "sum" Nothing Nothing to voAggregate
Handle hoAggregate
Get Create (RefClass(cComAggregate)) to hoAggregate
Set pvComObject of hoAggregate to voAggregate
Set ComFormatValue of hoAggregate to "value < 0 ? value : 0"
Send Destroy to hoAggregate
Send Destroy to hoAggregates
Set ComPivotRows to "0"
Set ComPivotColumns to "negative(5)"
End_Procedure
|
|
17
|
My data stores the data as strings, is it possible to load the data using Import method
Procedure OnCreate
Forward Send OnCreate
Get ComImport "'string 1';'string 2'#'string 3';'string 4'" "str=`'` eor='#' eof=';' hdr=0" to Nothing
End_Procedure
|
|
16
|
Is it possible to load data using different separators
Procedure OnCreate
Forward Send OnCreate
Get ComImport "item 1;item 2#item 3;item 4" "eor='#' eof=';' hdr=0" to Nothing
End_Procedure
|
|
15
|
Is it possible to align a column
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns 0 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComAlignment of hoColumn to OLERightAlignment
Set ComHeaderAlignment of hoColumn to OLERightAlignment
Send Destroy to hoColumn
Send Destroy to hoColumns
Send ComRefresh
End_Procedure
|
|
14
|
How can I change by code the column/rows background color
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Variant voAppearance
Get ComVisualAppearance to voAppearance
Handle hoAppearance
Get Create (RefClass(cComAppearance)) to hoAppearance
Set pvComObject of hoAppearance to voAppearance
Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
Send Destroy to hoAppearance
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voFormatAppearances
Get ComFormatAppearances to voFormatAppearances
Handle hoFormatAppearances
Get Create (RefClass(cComFormatAppearances)) to hoFormatAppearances
Set pvComObject of hoFormatAppearances to voFormatAppearances
Variant voFormatAppearance
Get ComAdd of hoFormatAppearances "aka" Nothing to voFormatAppearance
Handle hoFormatAppearance
Get Create (RefClass(cComFormatAppearance)) to hoFormatAppearance
Set pvComObject of hoFormatAppearance to voFormatAppearance
Set ComBackColor of hoFormatAppearance to |CI$1000000
Send Destroy to hoFormatAppearance
Send Destroy to hoFormatAppearances
Set ComPivotRows to "0[aka]"
Send ComEndUpdate
End_Procedure
|
|
13
|
How can I apply by code any appearance to my list
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0[italic]"
Set ComPivotColumns to "count(0)[underline]"
Set ComPivotTotals to "count[bold,strikeout]"
Send ComEndUpdate
End_Procedure
|
|
12
|
How can I display an icon instead SUM/Total field
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Send ComImages "gBJJgBggAAwAAgACEKAD/hz/EMNh8TIRNGwAjEZAEXjAojJAjIgjIBAEijUlk8plUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9oEEwGBwWDwmFw2Hw9+xUsxGNx2Px+LyUnyGVy2VyeZAGNjIJjITjIb0OjjGi0ukAAVjILzmayWtAGejCvjLh2u3jG23O4ACx1ew11+zEYGsZZsZUe/wkZ4sYZvD4PCy8kjAzjLFjKd5WDjIz6HRvnTwUZGMZX8ZTPb8XU8Hh9cFjALjKVjK5jIv9/w9t78WdjJIoyWr7sKjIWu+/a8Og2QAEajLaIxAzlwhB0DwQuzoECjJWw1DiMQ3D0OgAQMKwsuj8xOy0SrzFEWMdFUExbGMCRfC8ZRswMaLsiofJVHiOo+kKRs2lL2Jsh8cyQo6Ag=="
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voAggregates
Get ComAggregates to voAggregates
Handle hoAggregates
Get Create (RefClass(cComAggregates)) to hoAggregates
Set pvComObject of hoAggregates to voAggregates
Variant voAggregate
Get Comitem of hoAggregates "sum" to voAggregate
Handle hoAggregate
Get Create (RefClass(cComAggregate)) to hoAggregate
Set pvComObject of hoAggregate to voAggregate
Set ComName of hoAggregate to "<img>1</img> Sum"
Set ComCaption of hoAggregate to "<img>1</img>"
Send Destroy to hoAggregate
Send Destroy to hoAggregates
Set ComPivotColumnsFloatBarVisible to True
Set ComFormatPivotHeader to "iaggregate ? (caggregate + (iaggregate != 5 ? ' ' : '') + caption) : caption"
Set ComFormatPivotTotal to "caggregate"
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)"
Set ComPivotTotals to "sum,count"
Send ComEndUpdate
End_Procedure
|
|
11
|
How can I change the caption to be displayed when dragging an aggregate function
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotColumnsFloatBarVisible to True
Set ComFormatPivotHeader to "(iaggregate ? ('<b>' + upper(caggregate) + '</b> of ' + caption) : caption)"
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)"
Set ComPivotTotals to "sum,count"
Send ComEndUpdate
End_Procedure
|
|
10
|
I am using Import method, just wondering if I can rename the columns
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Variant voColumns
Get ComDataColumns to voColumns
Handle hoColumns
Get Create (RefClass(cComColumns)) to hoColumns
Set pvComObject of hoColumns to voColumns
Variant voColumn
Get Comitem of hoColumns 0 to voColumn
Handle hoColumn
Get Create (RefClass(cComColumn)) to hoColumn
Set pvComObject of hoColumn to voColumn
Set ComCaption of hoColumn to "New Caption"
Set ComPivotCaption of hoColumn to "New Pivot Caption"
Send Destroy to hoColumn
Send Destroy to hoColumns
Send ComRefresh
End_Procedure
|
|
9
|
Does your control support Fit-To-Page Print and Print Preview
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0,1,2"
Send ComExpandAll
Handle hoPrint
Get Create (RefClass(cComPrint)) to hoPrint // Import the 'ExPrint 1.0 Control Library' library
Set ComOptions of hoPrint to "FitToPage = On"
Set ComPrintExts of hoPrint to (pvComObject(Self))
Send ComPreview of hoPrint
Send Destroy to hoPrint
End_Procedure
|
|
8
|
How can I print the control
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0,1,2"
Send ComExpandAll
Handle hoPrint
Get Create (RefClass(cComPrint)) to hoPrint // Import the 'ExPrint 1.0 Control Library' library
Set ComPrintExts of hoPrint to (pvComObject(Self))
Send ComPreview of hoPrint
Send Destroy to hoPrint
End_Procedure
|
|
7
|
How can I hide the pivot bar (hide completly)
Procedure OnCreate
Forward Send OnCreate
Set ComPivotBarVisible to (OLEexPivotBarAllowResizeColumns + OLEexPivotBarAllowUndoRedo + OLEexPivotBarAutoUpdate + OLEexPivotBarAllowFormatContent + OLEexPivotBarAllowFormatAppearance + OLEexPivotBarAllowValues + OLEexPivotBarShowTotals + OLEexPivotBarAutoFit + OLEexPivotBarSizable)
End_Procedure
|
|
6
|
How can I hide the pivot bar (auto-hide)
Procedure OnCreate
Forward Send OnCreate
Set ComPivotBarVisible to (OLEexPivotBarAllowResizeColumns + OLEexPivotBarAllowUndoRedo + OLEexPivotBarAutoUpdate + OLEexPivotBarAllowFormatContent + OLEexPivotBarAllowFormatAppearance + OLEexPivotBarAllowValues + OLEexPivotBarAutoHide + OLEexPivotBarShowTotals + OLEexPivotBarSizable + OLEexPivotBarVisible)
End_Procedure
|
|
5
|
How can I count and get the total of a specified column
Procedure OnCreate
Forward Send OnCreate
Send ComBeginUpdate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotColumnsFloatBarVisible to True
Set ComPivotRows to "0"
Set ComPivotColumns to "sum(5)"
Set ComPivotTotals to "sum,count"
Send ComEndUpdate
End_Procedure
|
|
4
|
How can I add show the columns once I grouped a column
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0"
Set ComPivotColumnsFloatBarVisible to True
End_Procedure
|
|
3
|
How can I programatically group the columns
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
Set ComPivotRows to "0:D"
End_Procedure
|
|
2
|
Is it possible to load data from a data source
Procedure OnCreate
Forward Send OnCreate
Variant rs
Get Comcreateobject "ADOR.Recordset" to rs
Send ComOpen "Data" "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Program Files\Exontrol\ExPivot\Sample\Access\sample.accdb" OLEadOpenStatic OLEadLockOptimistic Nothing
Set ComDataSource to rs
End_Procedure
|
|
1
|
How can I load data
Procedure OnCreate
Forward Send OnCreate
Get ComImport "C:\Program Files\Exontrol\ExPivot\Sample\data.txt" Nothing to Nothing
End_Procedure
|